0 REM  SCHRAFFUR I
10 (null)1:(null)1:(null)1:(null)
20 (null):(null)1,0
30 (null)1
40 (null)200,80,100,40
50 (null)150,100,80,90
60 (null)2
70 (null)
80 (null)1
90 (null)160,90
100 (null)3
110 (null)
120 FORI=0TO199STEP3:(null)0,I,I*1.6,0:(null)319,199-I,319-I*1.6,199:NEXT
130 (null)
140 (null)1
150 (null)1
160 FORI=0TO10000:NEXT:(null)0